home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 27 / CDROM27.iso / share / progra / mai / Date-Time, returning current date and time < prev    next >
Encoding:
Text File  |  1997-07-14  |  229 b   |  8 lines

  1. 'Description: Returns current time and date
  2.  
  3. 'Place the following code in a Form_Load()
  4.  
  5. appdate = date
  6. apptime = time
  7. nl = chr$(10) + chr$(13)
  8. label1.caption = "Current Time : " & apptime & nl & "Todays Date : " & appdate